home *** CD-ROM | disk | FTP | other *** search
/ Colson Caster Selection Guide 3 / Colson Caster Selection Guide 3.0.iso / data1.cab / Program_Executable_Files / colsoncd.dxr / 00001Series_83.ls < prev    next >
Encoding:
Text File  |  2000-01-12  |  584 b   |  22 lines
  1. on mouseUp
  2.   put EMPTY into field "op"
  3.   if the hilite of cast "b_brk3" = 1 then
  4.     put "BRK3:Sidelock; " after field "op"
  5.   end if
  6.   if the hilite of cast "b_tg1" = 1 then
  7.     put "TG1:Metal; " after field "op"
  8.   end if
  9.   if the hilite of cast "b_tg2" = 1 then
  10.     put "TG2:Plastic; " after field "op"
  11.   end if
  12.   if the hilite of cast "b_fsi" = 1 then
  13.     put "FSI; " after field "op"
  14.   end if
  15.   delete char -30000 of field "op"
  16.   delete char -30000 of field "op"
  17.   put field "op" into field "mainop"
  18.   puppetSound("foundspec")
  19.   puppetTransition(47, 1, 8)
  20.   play frame "speca"
  21. end
  22.